5^P

^
var6440+EXPIFRETURNP6<0x7c><0xf476a3>AND.~255~<0x7e>ELSE~varfffffbffANDvarffffc101MODMOD/65CLNG&<0x61><0x7f>var01a7<0x54>ASC<0x7f><0x60><0xf476c4><0xf476c5>$<0xf476c7>3<0x46,0xfffffffc><0x7f>REM_f���/A
                                                                                                                                                                                               ABSREM?
A�&�_�`A�
Q�/!��|/
a��y@_<_�B��
��������
�5H��
����>�؁4����
�
VAL<0xef,0x01>79AND)h<0xf47759>ASCCALLh<0xf4775d>INPUT<0xef,0xfffffffc>02zFvar0601CVIEOFFIX<0xf4776b>DMKL$=6.73195e-3162<0x7c>l<0xf4777b>1v^<0xf47784>FNRNDOvar3b3fDLOCIFH<0x48>L<0x48>CWHILEQAND{&<0x61>THEN?<0xf477a0>CLNG<0x49><0x5c>113<0xf477a6>REM���D���a!!�!a����f^
h�g��
_O?�O!
�x�aR
�f�S�!fQx�
I��;3�
                                        AND<0xf47823>'labelffff99c0var2622READfALLFORq9?O5NOTASC<0x61>!LSEThMKS$@!+sCOSRNDA;WHILE<0xf4784a>                                         <0xc00,0x00>RNDLOGMODE=PUTCVSQ!K<0x55>ASCABS=D<0xaf,0x00>^ASC<0xf47897><0x5f>IFRETURNF43<0x54>ASC<0xaf,0x00><0xf478a2>AI<0x4d>INKEY$LINEA9CVS+CVD=U<0x52><0x51>LINEE]<0xf478b4>v2373591313<0xf478bb><0x20>q<0xaf,0x00>AIF/S<0xaf,0x01>var0fcb\<0xf478ca>33<0x5f>#AMKS$<0x61><0xf478d2><0xf478d3>fELSEIFELSEIFGOTOLSETELSEIABS97TOvar26011LOG<0x58>COMMON<0xf478e6>x[READK/ANDV<0xf478ee>)=9JW,<0xf478f5><0xf478f6>STR$WHILE<0xf478fc><0x5f>0ELSEELSEIF5n<0x7f>COMMON:<0xf47906>var5a9f<0x60><0x3b>0EOF<0x4a>xJ:<0xaf,0x00>//ANDGETF3XFIX<0x54>6ANDpSCVD5/PRINTSGN.MKD$Ak'                                                                                                                                                                                                 -=V9iGOSUB<0xf47968>varffffe60aJSINB5017var736aANDCINTNEXTRRETURN4READxFFh<0x59>YCOS9/113varffffc474/var5151M<0x8f,0x00><0x7f>h<0x8f,0x00>CLNGvarffffc493<0x58>!CLNG3071CHR$5LOC9WINDOW`LEFT$ <0xf479ab>ECALL<0x8f,0xfffffffc>XASCIMP(:ZCLOSE <0x51>RIGHT$SQR$7039LINE<0x59>oALINEf2667F<0x4f>?READ<0xf479cf><0x8f,0xfffffffc>!q!THEN1IFUSINGEXP_<0x53><0xf479dc><0x20>varffffea0e!{48642Rb<0xf479e9>varffffd002label421a                                                    CVDRNDx<0xc2,0x00><0x4f>/<0xf47a29>5var0e8e"�}na�Ara
4<0x7f>OR<0x7f><0xf47a3f>THEN[CLOSE<0xf47a43>1/RIGHT$<0x7e>74272494756XOPEN<0x20>label0264b<0x5f>CVDn?u9COMMONs10 6&Hb115ASC<0x4c>'RIF1fZ<0x61>c3<0xf47a75>1PUT(el<0xf47a7b><0x49>
<0xc2,0x00>fATNFOR5USING~ABSp<0x61>9LOGINKEY$FIELD14REM
1-R1�n��nK��
<0x7c>VAL
`nTHEN<0x7e>/h
GOTOABSV`NABS
4<0xc2,0x00><0xc2,0x01>REM�@�D�ی��np`0OJ4�a`�#
CVS&H3068<0xf47ad9><0x4b><0x20><0xc2,0x00>SINCVD<0xc2,0x01>                                                                                                                                                                                                                                      <0x60><0xf47b13>0'<0x7e>oLEN@EXP<0x7c>REM��#@��
3<0xf47b2b>LET<0x48>1EOF2439004314i<0xf47b36>EXP<0x5e,0xfffffffc>*RETURNOPEN2CVDEQVMKS$<0x5e,0xfffffffa>^-8.49892e+24
<0xf47b4a><0x48>THEN/<0x5e,0x00>9ABSLEXP<0x7e>&<0x3b>nWRITE
ABS@POKE8JTHEN6ABS<0x48>1LINEvar4034<0xf47b69>*READMKS$THEN`                                                                                                                                                                        43258 var5305ABSF)
<0x5f>ATNCOS/ELSEEXPIFIFEXP<0x19,0x00>CVDTwMKS$                    62<0x60><0x60>K^W4<0x60><0x7e><0xf47bfc>PSTEP'ATNRNDgAREAMKS$=LEFT$>ACOMMON<0x3e,0xfffffffc>8LETEXP<0xf47c10>/8.17005e-315COSCOSIF<0x3e,0x0c><0xf47c20>+LET_CVL`<0x49>*@
mCLNG<0xf47c2c>IF5                                                                                                                                                                                                                         CVDCOSB*<0x57>CHR$'FN:LIBRARY5TO
PUTho&H4b84ELSE
$<varffff8915kRIGHT$9-FOR%<0x96,0x00><0x4b>AREAlabelffffd15b0FNMID$EXP<0x58>
LR<0x20>33
CDBLSTR$label69edIFEFIXEQVINPUTKCOMMONINPUTINPUT:THEN<0x56>Y|FOR*ELSEIFw&EOF<0x96,0x00>/
PUT^4PRINTAMID$RANDOMIZE&%>MKS$<0x53>:x0MID$<0x96,0x00>n9.FOR<0xf47cce>1'296617103<0x7e>1XOR
CDBL
INKEY$`6var0f19<0x61>L`9<0xf47ce6>EXPak34<0x46>var0aa2^AbbREAD&H9900 <0x5b>CVD<0x5b>1~7FORU<0xf47d2a>RSET7D<0xf47d2e>j<0x45>a*<0x4c>M<0xf47d35>Z`DATACLOSE<0x52>COS<0xf47d3e><0x48>CVD9<0x46>0EABS<0xf47d48>ELSEIFhZABSLSET3696673100><0x61><0xe4,0x00>-/`CINT<0x47>MID$MKS$<0xf47d5e>P%OA<0x61>BzSTR$40OPEN&<0x62>01~!kCINTS<0xf47d73>CDBL19170<0xf47d78>/0DnB8 ORMKI$
8.09315e-315OREOF<0x57>INT1PRINTY$3$SQR 7LOFDATA
Y78<0x7d>SQR<0xf47da5><0x56>ELSEIFxT<0xf47daa>CVD@yD<0xf47daf>STR$CVI<0x5e><0x20>Q^ONV<0xf47db8>FF
<0x7f>ONwUUUMKS$
0230%///
READmmmABS<0x4a>LENMKS$XXX<0x62>5<0x7c><0xf47ddc>j`cc
t'ELSEIFll<0xf47de7>@ELSEIF<0xf47dea><0xf47deb><0xf47dec>@xX<0x7e><0xf47df1><0x48>;@EXP@FIELDWRITE<0x60><0x5a>A`LOFIFVIF ATNii                                                                                                                                                           VINTPRINToYu<0xad,0x00>SINNEXTjYPTAB=EQVOPENTANfkINTTHEN2<0x7e>9C<0x7e>STRING$d34fNEXTe5�LX����`3�_
���s556&&࠰��c��]fU�����

			��;FIELDPeP<0xf47e5c><0xf47e5d>A<0xf47e5f>jZoRETURNlRSETWHILEVYZeUiYUnINT/WRITEo[<0xf47e76>nd0<0xf47e7a>var01060
RIGHT$ZATNANDATNMKL$<0x48>8<0x7f>^x<0x4c>ELSEIF<0x7c>COMMON|'CDBL|LEN31122c02<0xf47e9a>INT;STRING$n[label1111[OPENU4407PRINTWRITE<0x59>ONLOFb12var6af5FWENDW<0xad,0x00>]ABSMKL$ <0xf47ebe>CLNG0WHILEREADWHILEiREADYWRITE<0x7f>WRITEWHILE~READ~998<0xf47ed4>886_6911*                                                                                                                                                                            lLEFT$l\\ONONONiONZfMKL$<0x5c>eieELSEIFa<0x61><0x58><0xf47f27>@RETURN
<0xf47f2b>DATAABS<0xf47f2e>
<0xf47f30><0x5c>^<0x4c><0xf47f34>vT<0xf47f37>varffff8794d<0xf47f3c>49328VALX<0x5f>CHR$RETURNc[niZnZGOTO<0xaa,0x00><OPEN<0x3b><0x7f><0x3b>g<0xf47f56>_>LOG9[GOSUBMID$EXPAFIXAREA,>AFOR<0xf47f66>CLNG<0xf47f68>labelffff8008&COMMONhf+OPEN+VALkMKD$GETfg9-nanINPUTV\<0x7d><0xf47f83>_}LINELEN}WRITEnjINTOPENGOSUBEYvar0419<0xf47f94><0xf47f95><0xf47f96><0xf47f97>`4kf<0x45>f<0xf47f9e><0xf47f9f>LOG\COMMONGOTO<0x5e>AABSvarfffff175EQVCOMMONVALX6W21UJCVIABS"�j)                  vsg6<0x4a>!qy/FOR]CVIV<0xf48001>FWX&H1c4f#3Y<0xf4800b>3_ORmj-Y)747.))YP<0xf4801c>MKS$EXPi3109359940o<0x52>dFORdUU<0xf4802c>E3oREADPUT<0x7e>xY9Y<0xf48037>yTANeye$e<0xf4803f>CINTlabel0d44PRINT3ZCOSXfPRINTTCVD.@labelffffff82CVIELSEIF|\GETw|GOTOY+INT<MKD$jINKEY$UvGOSUBQFIX<<0x4b>PRINTINPUTnGOSUBGOSUBfGOSUBVo<0xf48073><0xf48074><0xf48075>varffffe5030hINTXOR
)<0x54>@DINKEY$eMKS$8LSET<0xf3,0x00>75i\WRITE<0x5a>OR38|<0x62>TAN<<dOXOR<0x59>iINTSTR$xIFddVAL<0x4f><0xf3,0x00>mLEN2IMP6=<0x5d><0x56>ZGOSUB<0x4b>OPEN:<0xf480b5>8FCDBL<0x56><0xf480ba><0xf480bb><0xf480bc><0x5c>9<0xf480bf>AND
@@2<0xf480c7><0x20><0x7f>ONlabelffffa262b<0xf480cf><0x48>COSdJ=19CVIFOR*GET_CVLlabel2995PA                                               @CCVL3088629859#<0xf4811b>5CALL'<0x56>var042d<0x47>oGOTOX<0xf48127>7<0xf48129><0x61>A<0x5c>UVALz<0xf48130><0xf48131><0xf48132><0xf48133>ASC%varffffeb05nz7